UNIVERSITY OF ILLINOIS 
DIGITAL COMPUTER 



ILLINOIS CODE 6k - S2 



TITLE Exponential (SADOI or DOl) 

TYPE Closed 

NUMBER OF WORDS 33 

TEMPORARY STORAGE 0, 1 

~-38 
ACCURACY Maximum error 2 

DURATION 12 milliseconds 

DESCRIPTION The routine replaces A by e if A is negative* 

N0TE3 If a large range is required it can be readily achieved 

by squaring* using the identity 

[exp (x)] p = exp (2 p x) 



RT: 10/13/60 



DAT E August 13, 1956 
CODED BY David J. Wheeler 



CHECKED BY Bessie Cobb 



APPROVED BY J. P. Nash 
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ORDER 
Q0K(S2-) 

S5 17L 
L4 9L 
42 16L 
50 F 
01 3F 
L4 L 
36 4l 
42 l4L 
42 15L 
11 3F 
S5 F 
L4 25L 
40 F 
50 26L 
L5 12L 
26 11L 
7J F 
L4 F .-■' 
40 IF 
50 IF 
L5 % 
L4 13L 
46 9L 
LO 2TL 
32 8L 
7J F 

l4 f 
4o IP 

50 F 
7 J IF 
L4 f 
32 i6l 

22 F , 



NOTES 



PAGE 1 



S2 



From 12' 
By ll l 



From 8 



By 4 
By 4' 
By 1' 



Set Link 



Look at 2" s 2~ 2 , 2 , ef x 
Calculate table entry 



Set table entry address 



-1 - l/l6 and remainder (x-x ) 
x 



Evaluate exp (x-x - l/l6) - 1 



e - table entry 
+ table entry -» 9 



link 



LOCATION 


\ 
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00 F 00 3916 
0562 6677 J j 


e -l 5 /l6 


18 


OOF 00 4437 
4731 0081 J 




e -15/l6 
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4QF 00 0028 
3157 7971 J 




-11/16 


20 


40F 00 0697 








8282 4731 J 




e ' Table Entries 
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40F 00 1456 
4852 6428 J 




e -TA6 
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40F 00 2316 
1562 8947 J 




e -5A6 
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40F 00 3290 
29H 8180 J 




8 -3/l6 
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40F 00 4394 
1306 2813 J 




e" 1 /^ 
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78 F 








00 F 




-1 - l/l6 


26 


00 F 00 0013 








8888 8889 J 




l/l6 
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LI 33L 








34 IF 




End Constant 
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00 F 00 OO83 








3333 3333 J 




wr 
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OOF 00 04l6 




..? 




6666 6667 J 




x/fk 
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OOF 00 1666 








6666 6667 j 




1//T 
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4o F 








00 F 




i/\(F 
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00 F 








00 F 








S2 



